home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 76 / XENIATGM66.iso / Indiana Jones / Indiana Jones.exe / RESOURCE / PREVIEW.GOB / cog_shw_grill.cog < prev    next >
Text File  |  1999-11-15  |  2KB  |  80 lines

  1. # Jones 3D Cog Script
  2. #
  3. # shw_portcullis.cog
  4. #
  5. # Sluiceway Alternating Script
  6. #
  7. # [CMG]
  8. #
  9. # (C) 1997 LucasArts Entertainment Co. All Rights Reserved
  10. # ========================================================================================
  11.  
  12. symbols
  13.  
  14. message activate
  15. message arrived
  16. message user0
  17. message user1
  18.  
  19.  
  20. thing   grill0
  21. thing   switch0
  22.  
  23. int     thaw=0  
  24.  
  25. end
  26.  
  27. # ========================================================================================
  28.  
  29. code
  30.  
  31. activate:
  32.  
  33.  
  34.         If ((GetSenderRef() == switch0) && (thaw == 0))
  35.                 {
  36.                 print("it's out of power");
  37.                 return;
  38.                 }        
  39.  
  40.  
  41.         If ((GetSenderRef() == switch0) && (thaw == 1))        
  42.              {   
  43.                 If (Getcurframe(grill0) == 0)
  44.                 {
  45.                         Movetoframe(switch0, 1, .5);
  46.                         Movetoframe(grill0, 1, .3);
  47.                 }
  48.                 
  49.         else
  50.                 
  51.                 If (Getcurframe(grill0) == 1)
  52.                 {
  53.                         Movetoframe(switch0, 1, .5);
  54.                         Movetoframe(grill0, 0, 6);
  55.                 }
  56.              }
  57. return;
  58.  
  59. # ========================================================================================                
  60. arrived:
  61.  
  62.                 If (GetsenderRef() == grill0)
  63.                 
  64.                 Movetoframe(switch0, 0, 3);
  65.                 return;
  66.                 
  67. # ========================================================================================
  68. user0:
  69.  
  70.         thaw = 0;
  71.         return;
  72.         
  73. user1:
  74.         thaw = 1;
  75.         return;
  76.  
  77. # ========================================================================================
  78.  
  79. end
  80.